home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / util / boot / GetMouseInput.lha / GetMouseInput / SampleScriptSTDOUT < prev   
Encoding:
Text File  |  1997-06-11  |  350 b   |  15 lines
  1. ; Example startup-sequence file using GetMouseInput V1.3 with STDOUT
  2. ; option
  3.  
  4. If `GetMouseInput STDOUT` EQ 1
  5.    Execute S:Startup1 ; Left mouse button pressed
  6. Else
  7.    If `GetMouseInput STDOUT` EQ 2
  8.       Execute S:Startup2 ; Right mouse button pressed
  9.    Else
  10.       Execute S:NormalStartup-Sequence ; No buttons pressed
  11.    EndIf
  12. EndIf
  13.  
  14. EndCLI >NIL:
  15.